Top 10k strings from Spectrum Game Writers' Pack (1983)(Collins Educational)(Side B)[a].tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
2 SPEED ADJUSTMENT 2 FRONT PAGE 2 ;" " 2 "YES OR NO"; 2 MACBRIDE 1983 << 1 tl,tc;"boom" 1 sl =start line 1 sc =start column 1 olumn =";c;" " 1 ine =";l;" 1 fl =finish line 1 fc =finish column 1 delay between movements 1 X1 , X2 set limits for random moves.See lines 300 - 1 WORKING ARRAY 1 W$=D$(H,N) 1 TO TURN CLOCKWISE" 1 TO TURN ANTI-CLOCKWISE" 1 THE WORLD IS ROUND 1 THE WHITED OUT LINES PRODUCE THE DISPLAY COMMENTS. YOU DON'T NEED THEM. IF YOU WANT TO SEE THEM RUB OUT THE COLOUR CONTROL AT THE START OF THE LINE 1 TARGET ROUTINE 1 TARGET MOVER 1 TARGET 9 1 SWITCH NEEDED ? 1 START OF MOVEMENT LOOP 1 START CLOCK.Base count Crash count 1 START AGAIN ? 1 SPIN ROUTINE 1 SPEED CONTROL 1 SPEED -length of BEEP 1 SPECTRUM GUESSES 1 SPACE 1 SCREEN DISPLAY 1 S=SWITCH DONE 1 Right Places 1 Right Colours 1 RUN IT AGAIN? 1 RUB OUT GUN 1 RACING 1 Press any key to start 1 Press ""G"" to go on. 1 PRODUCES 4 DIFFERENT RANDOM NUMBERS 1 TO 6 1 PRINTS THE COLOURS 1 PRINTS HANDS 1 PRESS ANY KEY WHEN READY. 1 PRESS ANY KEY TO GO ON. 1 PRESS ANY KEY FOR NEXT MOVE 1 PLEASE CHECK THAT. 1 PLAYER'S INPUT 1 PLAYER'S GUESSES 1 PICTURE CARDS 1 PICKS SUIT 1 PICKS CARD VALUE 1 PATH-MAKING ROUTINE 1 ONE HAND AT A TIME 1 NUMBERS MUST BE BETWEEN 1 AND 10 1 MOVE - WHICH WAY ? 1 MAZE & 1 Line in use on this movement. 1 LOGICOL 1 KEY CONTACT ? 1 Index or Game ? 1 INTRODUCTION 1 INSTRUCTIONS 1 INKEY$ CHECKS 1 INITIAL VALUES 1 HOW'S THAT THEN? 1 Graphics Definition 1 GRAPHICS DEFINITION 1 GOTO 300 for the game. 1 GAME INSTRUCTIONS 1 Front Page 1 FULLY SORTED. READY TO PLAY. 1 FRONT PAGES 1 FLASHES NEW MOVE 1 FL>SL)-(.1 1 FIRING BUTTON 1 FC>SC)-(.1 1 ELAPSED TIME 1 DRAWS TRACK ON SCREEN 1 DIRECTED MOVEMENT 1 DATA PRINT OUT 1 D$(H,N,2)=CARD VALUE 1 D$(H,N,1)=SUIT GRAPHIC 1 D$(H,N)=D$(H,N+1 1 Created with Ramsoft MakeTZX 1 COPY ONTO WORKING ARRAY 1 COMPUTER'S COLOURS 1 COMMENTS ON DISPLAY 1 CLOSE LOOP 1 CHOOSE YOUR OWN ENDS ? 1 CHECKS NOT USED ALREADY 1 CHECKS FOR ANY LEFT 1 CHECK FOR HIT 1 CHECK FOR END 1 CHECK ATTRIBUTES 1 CARDS 1 CAR CO-ORDINATES 1 BASES-NOTE-ALL "BRIGHT" 1 ANY RIGHT COLOURS ? 1 ANY IN RIGHT PLACE ? 1 ALL BRIGHT 1 ADJUSTS LIMITS FOR RND MOVES 1 ;RP;" ";RC 1 ;"use of ATTRIBUTES." 1 ;"to move the gun (+)." 1 ;"stop it." 1 ;"show how to move ""Targets"" and" 1 ;"or ""G"" for the example game." 1 ;"making routine works,and how an" 1 ;"array can be used to map a maze." 1 ;"and move graphics in 4 ways." 1 ;"YOU MUST GUESS THEM." 1 ;"YOU MAY LIKE TO LIST THIS." 1 ;"YOU CAN FIX THE START AND END" 1 ;"X (RND) =" 1 ;"Variables....................400" 1 ;"Variables. 1 ;"VARIABLES...................500" 1 ;"This program shows how to turn" 1 ;"This program shows how a path-" 1 ;"This program demonstrates the"; 1 ;"This is the basic character..." 1 ;"This is a working diagram to " 1 ;"They are UDG's with character code numbers 144,145,146 and 147" 1 ;"These 4 characters are used..." 1 ;"The BEEPs might annoy you so .." 1 ;"Target Line ";tl;" ": 1 ;"Target Column ";tc+1 1 ;"TRY TO LAND YOUR SPACESHIP IN " 1 ;"THIS PROGRAM SHUFFLES,DEALS AND" 1 ;"THE NUMBERS ARE ALL DIFFERENT." 1 ;"THE HEART OF THIS PROGRAM " 1 ;"TARGET": 1 ;"TARGET SHOOTING" 1 ;"TARGET ROUTINE.........400" 1 ;"SPEED ADJUSTMENTS......480" 1 ;"SPECTRUM IS THINKING OF 4 COLOUR" 1 ;"SORTS A PACK OF CARDS." 1 ;"Ready when you are." 1 ;"RIGHT RIGHT" 1 ;"Press keys 1 ;"Press any key to start.": 1 ;"Press any key to spin it.": 1 ;"Press ""P"" for Program Index" 1 ;"PRESS ANY KEY TO WATCH." 1 ;"PRESS ANY KEY TO GO ON." 1 ;"PRESS ""T"" TO TAKE OFF": 1 ;"POINTS TO SUIT YOURSELF." 1 ;"PLACES COLOURS" 1 ;"ONCE. I CAN ONLY GUESS THE " 1 ;"NUMBERS -E.G. 1 ;"NOW THEY NEED SORTING" 1 ;"NOT USE ANY COLOUR MORE THAN " 1 ;"Movement loop................450" 1 ;"MORE DAMAGE": 1 ;"LOGICOL" 1 ;"LIST 170 to see the spin routine" 1 ;"LINE 600 ONWARDS." 1 ;"LIKE TO RUN IT AGAIN ?" 1 ;"LANDED ?....................690" 1 ;"IS THE SORTING ROUTINE FROM " 1 ;"INKEY$ CHECKS..........500" 1 ;"INDEX......................2000" 1 ;"IN THE FIRST PART OF THIS GAME" 1 ;"I AM NOT VERY CLEVER.PLEASE DO" 1 ;"HOW TO DRIVE YOUR CAR" 1 ;"HOLD DOWN A KEY FOR FAST SORT" 1 ;"HAND ";H 1 ;"Gun Line ";gl;" ": 1 ;"Gun Column ";gc;" " 1 ;"Graphics Definition..........290" 1 ;"GRAPHICS DEFINITION..........25" 1 ;"GRAND PRIX" 1 ;"GOTO 300 to move on. " 1 ;"GOOD LANDING": 1 ;"GAME INSTRUCTIONS......300" 1 ;"FURTHER PAGES.......210,300,400" 1 ;"FRONT PAGE..................105" 1 ;"ENTER COLOURS ONE AT A TIME." 1 ;"ENOUGH": 1 ;"EDGE ROUTINE................650" 1 ;"Draw Track....................30" 1 ;"Do you want instructions ?" 1 ;"DIRECTION 1" 1 ;"DIRECTED MOVEMENT...........610" 1 ;"Controls.....................500" 1 ;"Co-ordinate change...........550" 1 ;"Check for crash..............590" 1 ;"CRASHING -AS FAST AS YOU CAN." 1 ;"CRASH!.......................610" 1 ;"CONTROLS....................560" 1 ;"COMMENTS,AND END ROUTINE...1000" 1 ;"COLOURS AND NOT THEIR PLACES." 1 ;"CHECK FOR HITS.........600" 1 ;"BUMP.CAREFUL": 1 ;"BRAKE ACCELERATOR" 1 ;"BEEP time .25" 1 ;"A TOTAL OF FOUR BASES -WITHOUT" 1 ;"? ? ? ? " 1 ;"400 IF C=FC AND L=FL THEN GO TO 500 " 1 ;"370 IF X>";X2;" THEN LET C=C-1: IF C<1 THEN LET C=1:GO TO 300 " 1 ;"350 IF X>.5 AND X<";X2;" THEN LET C=C+1: IF C>10 THEN LET C=10:GO TO 300 " 1 ;"330 IF X>";X1;" AND X<.5 THEN LET L=L-1: IF L<1 THEN LET L=1:GO TO 300" 1 ;"310 IF X<";X1;" THEN LET L=L+1: IF L>10 THEN LET L=10:GO TO 300 " 1 ;".......620" 1 ;".......560"; 1 ;"""guns"" in shooting type games." 1 ;"!! CRASHED !!": 1 ;" TIME ";T;" SECONDS " 1 ;" SCORE ";S 1 ;" " 1 ;" " 1 (SL,SC)>64 1 (CL,CC)>64 1 "YES OR NO PLEASE.";A$: 1 "YES OR NO PLEASE";A$: 1 "START LINE ";SL 1 "START COLUMN ";SC 1 "PRESS ANY KEY TO SEE HANDS." 1 "HOW MANY COLOURS RIGHT ?"; 1 "FINISH LINE ";FL 1 "FINISH COLUMN ";FC 1 "ENTER COLOURS ONE AT A TIME."; 1 "DO YOU WANT ANOTHER GO ?"; 1 "CAN I HAVE A GO NOW?"; 1 "ANOTHER GO ?(Y/N)"; 1 "ANOTHER GAME ?(Y/N)";A$ 1 "ALL DEALT."'' 1 " THIS TAKES ABOUT 20 SECONDS."'' 1 " SHUFFLING 1 " I AM DEFINING GRAPHICS" 1 " HERE THEY COME"'' 1 " DONE.": 1 to start the game." 1 to RUN the program." 1 to End game"; 1 to ""fire""." 1 for the Program Index" 1 for a quiet program or 1 TO SPEED UP." 1 TO SLOW DOWN." 1 MACBRIDE << 1 MACBRIDE 1982 << 1 MACBRIDE 1982 1 MACBRIDE 1982 1 AND DEALING."'': 1 Press any key to start. 1 PRESS ANY KEY TO GO ON